package io.gitee.zhucan123.core.infrastructure.annotation;


import com.niimbot.middlend.core.infrastructure.dataconversion.IntegerEnum;
import com.niimbot.middlend.core.model.code.Code;
import com.niimbot.middlend.core.model.code.ModelCode;
import com.niimbot.middlend.core.model.code.RootCode;
import com.niimbot.middlend.core.model.code.TypeCode;
import lombok.extern.slf4j.Slf4j;

import java.io.File;
import java.io.IOException;
import java.lang.reflect.InvocationTargetException;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * @author: zhuCan
 * @date: 2019-07-25 10:39
 * @description: 扫描某 package里面的所有 enum 的属性值
 */
@Slf4j
public class EnumScanHandler {

  /**
   * Object instantiation is forbidden
   */
  private EnumScanHandler() {
  }

  public static RootCode scanHandler(String module, String packageName) {

    List<TypeCode> typeCodes = new ArrayList<>();

    //多包扫描
    String[] packageList = packageName.split(",");
    Set<Class<Enum>> classSet = new HashSet<>();
    Arrays.stream(packageList).forEach(packagePath -> {
      //获取到包里及子包所有实现了IntegerEnum 的枚举类
      classSet.addAll(getClasses(packagePath, true));
    });

    //遍历每个枚举
    classSet.forEach(x -> {
      Enum[] enums = x.getEnumConstants();

      //获取此枚举的注解类 ,用来获取枚举默认值
      EnumScan enumScan = x.getDeclaredAnnotation(EnumScan.class);
      //建一个默认枚举属性类
      Code defaultEnum = Code.builder()
          .key("-1")
          .value("")
          .build();
      if (enumScan != null) {
        defaultEnum.setKey(String.valueOf(enumScan.defaultEnumCode()));
      }

      List<Code> codes = new ArrayList<>();
      TypeCode typeCode = TypeCode.builder()
          .codes(codes)
          .name(x.getSimpleName())
          .defaultCode(defaultEnum)
          .build();
      typeCodes.add(typeCode);

      //遍历每个枚举里面的实例
      Arrays.stream(enums).forEach(e -> {
        Object code;
        Object name;
        try {
          code = x.getMethod("getValue").invoke(e);
          name = x.getMethod("attributeName").invoke(e);

          codes.add(Code.builder()
              .key(code.toString())
              .value(name.toString())
              .build()
          );

          //给默认枚举 赋值
          if (code.toString().equals(defaultEnum.getKey())) {
            defaultEnum.setValue(name.toString());
          }
          System.out.println(name.toString() + code);
        } catch (IllegalAccessException | InvocationTargetException | NoSuchMethodException ex) {
          ex.printStackTrace();
        }

      });

    });

    return RootCode.builder()
        .models(newArrayList(ModelCode.builder()
            .model(module)
            .types(typeCodes)
            .build()))
        .module(module).build();
  }

  /**
   * 扫描 package 里面所有的 class
   *
   * @param pack      包名
   * @param recursive 是否递归 子包
   * @return
   */
  private static Set<Class<Enum>> getClasses(String pack, boolean recursive) {
    // 第一个class类的集合
    Set<Class<Enum>> classes = new LinkedHashSet<>();


    // 获取包的名字 并进行替换
    String packageName = pack;
    String packageDirName = packageName.replace('.', '/');
    // 定义一个枚举的集合 并进行循环来处理这个目录下的things
    Enumeration<URL> dirs;
    try {
      dirs = Thread.currentThread().getContextClassLoader().getResources(
          packageDirName);
      // 循环迭代下去
      while (dirs.hasMoreElements()) {
        // 获取下一个元素
        URL url = dirs.nextElement();
        // 得到协议的名称
        String protocol = url.getProtocol();
        // 如果是以文件的形式保存在服务器上
        if ("file".equals(protocol)) {
          System.err.println("file类型的扫描");
          // 获取包的物理路径
          String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
          // 以文件的方式扫描整个包下的文件 并添加到集合中
          findAndAddClassesInPackageByFile(packageName, filePath,
              recursive, classes);
        } else if ("jar".equals(protocol)) {
          // 如果是jar包文件
          // 定义一个JarFile
          System.err.println("jar类型的扫描");
          JarFile jar;
          try {
            // 获取jar
            jar = ((JarURLConnection) url.openConnection())
                .getJarFile();
            // 从此jar包 得到一个枚举类
            Enumeration<JarEntry> entries = jar.entries();
            // 同样的进行循环迭代
            while (entries.hasMoreElements()) {
              // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
              JarEntry entry = entries.nextElement();
              String name = entry.getName();
              // 如果是以/开头的
              if (name.charAt(0) == '/') {
                // 获取后面的字符串
                name = name.substring(1);
              }
              // 如果前半部分和定义的包名相同
              if (name.startsWith(packageDirName)) {
                int idx = name.lastIndexOf('/');
                // 如果以"/"结尾 是一个包
                if (idx != -1) {
                  // 获取包名 把"/"替换成"."
                  packageName = name.substring(0, idx)
                      .replace('/', '.');
                }
                // 如果可以迭代下去 并且是一个包
                if ((idx != -1) || recursive) {
                  // 如果是一个.class文件 而且不是目录
                  if (name.endsWith(".class")
                      && !entry.isDirectory()) {
                    // 去掉后面的".class" 获取真正的类名
                    String className = name.substring(
                        packageName.length() + 1, name
                            .length() - 6);
                    try {

                      Class enumClass = (Thread.currentThread().getContextClassLoader()
                          .loadClass(packageName + '.' + className));
                      /**
                       * 此处判断这个枚举是否实现了 IntegerEnum接口 ,并且是 enum
                       */
                      if (IntegerEnum.class.isAssignableFrom(enumClass) && Enum.class.isAssignableFrom(enumClass)) {
                        classes.add((Class<Enum>) enumClass);
                      }

                    } catch (ClassNotFoundException e) {
                      // log
                      e.printStackTrace();
                    }
                  }
                }
              }
            }
          } catch (IOException e) {
            e.printStackTrace();
          }
        }
      }
    } catch (IOException e) {
      e.printStackTrace();
    }

    return classes;
  }

  /**
   * 以文件的形式来获取包下的所有Class
   *
   * @param packageName
   * @param packagePath
   * @param recursive
   * @param classes
   */
  private static void findAndAddClassesInPackageByFile(String packageName,
                                                       String packagePath, final boolean recursive, Set<Class<Enum>> classes) {
    // 获取此包的目录 建立一个File
    File dir = new File(packagePath);
    // 如果不存在或者 也不是目录就直接返回
    if (!dir.exists() || !dir.isDirectory()) {
      log.warn("用户定义包名 " + packageName + " 下没有任何文件");
      return;
    }
    // 如果存在 就获取包下的所有文件 包括目录
    // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
    File[] dirFiles = dir.listFiles(file -> (recursive && file.isDirectory())
        || (file.getName().endsWith(".class")));
    if (dirFiles == null) {
      return;
    }
    // 循环所有文件
    for (File file : dirFiles) {
      // 如果是目录 则继续扫描
      if (file.isDirectory()) {
        findAndAddClassesInPackageByFile(packageName + "."
                + file.getName(), file.getAbsolutePath(), recursive,
            classes);
      } else {
        // 如果是java类文件 去掉后面的.class 只留下类名
        String className = file.getName().substring(0,
            file.getName().length() - 6);
        try {
          // 添加到集合中去
          // 这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
          Class enumClass = (Thread.currentThread().getContextClassLoader()
              .loadClass(packageName + '.' + className));
          /**
           * 此处判断这个枚举是否实现了 IntegerEnum接口 ,并且是枚举类
           */
          if (IntegerEnum.class.isAssignableFrom(enumClass) && Enum.class.isAssignableFrom(enumClass)) {
            classes.add((Class<Enum>) enumClass);
          }

        } catch (ClassNotFoundException e) {
          e.printStackTrace();
        }
      }
    }
  }
}
